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Garabage collection 
er en tidrøver, der kan 
sættes ud af spillet 
med to subrutiner 


Det er ikke al den hukommel¬ 
se, som ikke bruges i VIC, der 
er tom. Faktisk slettes ind¬ 
holdet af streng-området ik¬ 
ke før, der virkelig er brug for 
pladsen. Så længe der er tom 
plads andre steder, bruges 
den først. 

I praksis foregår det på den 
måde, at variabeltabellen 
indeholder oplysninger om, 
hvor strengene befinder sig 
(hvor de starter), og hvor lan¬ 
ge de er. Hvis man f.eks. har 
en streng-variabel, A$, der 
hedder ” VI & VIC”, gemmes 
der i variabeltabellen oplys¬ 
ninger om, hvor i hukommel¬ 


sen, variablens indhold er 
gemt, og der er en oplysning 
om, at den er 8 karakterer 
lang. Maksimum er 256 ka¬ 
rakterer. 

Hvis man herefter ændrer 
A$, så den får indholdet 
”BRUGERBLAD”, vil det 
af tabellen fremgå, at A$ er 
10 karakterer lang, men den 
ligger ikke det samme sted, 
som den oprindelige A$ - den 
ligger i et nyt område af 
RAM-hukommelsen. Det er 
samtidig registreret, at den 
del af hukommelsen, som var 
brugt til ”VI & VIC” nu ger- 
ne - må bruges til noget nyt. 
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VIC 


Fortsat fra forsiden 

Det sker imidlertid ikke, før 
computeren virkelig har brug 
for det - og det vil sige, når he¬ 
le hukommelsen er ved at væ¬ 
re brugt op. Så går compute¬ 
ren på GARBAGE COL- 
LECTION - ”spildsamling” 
- og frigør på den måde den 
ledige plads. 


fremmest ved deling af de 
strenge, der indeholder op¬ 
lysninger om de enkelte po¬ 
ster, og det sker, når compu¬ 
teren skal danne den linie, 
som skal skrives. 

Her laver man nemlig først én 
streng, som indeholder da¬ 
toen - derefter ændres stren- 


bilder computeren ind, at 
streng-området er meget 
mindre end det i virkelighe¬ 
den er - og derfor bliver der et 
mindre område at gennemfø¬ 
re garabage-collectioni. Helt 
konkret sætter man i subruti¬ 
nen i linie 20 pointerne, der 
viser, hvor hukommelsen en¬ 
der (top of memory) til det 
sted, hvor strengene ender 
(bottom of strings). Streng¬ 
arealet ligger nemlig i toppen 
af hukommelsen, og med 


denne manøvre undgår man 
garbage collection i hele det 
område, hvor de oprindelige 
strenge befinder sig. Resulta¬ 
tet: Lynhurtig udskrivning. 
Men man skal huske at sætte 
pointerne tilbage igen, når 
man er færdig med udskriv¬ 
ningen - og det sker i subruti¬ 
nen i linie 21. De oprindelige 
værdier er gemt i hukommel¬ 
sesplads 251 og 252 - pladser, 
som er ledige i både Commo- 
dore 64 og VIC-20. 


2ø P0KE251>PEEK 55 > : P0KE252,PEEK<56>-P0KE53, 
' PEEK<51>:P0KE56,PEEK<32):X»FRE<0):RE 
TURN 

21 P0KE33,PEEK <251) :P0KE36,PEEK<232)=RETURN 


Brug ikke 
REPLACE på 
disketterne 


Tager lang tid 

Problemet med garbage col¬ 
lection er tiden. Selv om en 
computer arbejder meget 
hurtigt, kan en sådan frigø¬ 
relse af ledig RAM-hukom- 
melse tage ganske lang tid - i 
ekstreme tilfælde så lang tid, 
at man får det indtryk, at 
programmet er gået i stå, eller 
computeren simpelthen er 
faldet i søvn. 

Omfanget af garbage collec- 
tion-problemet afhænger 
dels af, hvor megen hukom¬ 
melse der skal gennemsøges 
for at frigøre ledig RAM, dels 
af, hvor mange streng-opera¬ 
tioner, man arbejder med. 

Et eksempel er givet i det 
regnskabsprogram, som vi 
præsenterer i dette nummer 
af VI & VIC. Her foregår 
ganske mange streng-opera¬ 
tioner, når en kassejournal 
eller et momsregnskab skal 
skrives ud. Det sker først og 


gen, så den også indeholder 
teksten til posten, og den æn¬ 
dres, så den får fra 1 til 3 tal¬ 
kolonner rigtigt på plads - og 
hver gang linien ændres, ko¬ 
pieres der nye strenge ned i 
streng-området. 

Har man ikke mange variab¬ 
ler i hukommelsen, betyder 
det, at man kun har et lille 
område at gennemsøge for at 
finde ledig RAM, men har 
man mange, kan sagen blive 
alvorlig. 

I dette konkrete tilfælde be¬ 
tød det, at udskrivningen af 
en enkelt side kan tage op 
mod en halv time - hvor nogle 
få minutter ville være mere ri¬ 
meligt. 


Løsningen 

Men heldigvis kan mange 
problemer løses - og også det¬ 
te. Trick’et består i, at man 


Det er en snild funktion på 
VIC diskettestationen, at 
man ved hjælp af det lille a, 
omkranset af en ring kan 
gemme programmer og data¬ 
filer under et allerede eksiste¬ 
rende navn - hvor det gamle 
indhold så erstattes af det 
nye. 

Men vi må advare mod at 
bruge denne mulighed, for 
der er set eksempler på, at der 
gik kludder i de pointere, der 
fortæller, hvor de forskellige 
ting er gemt, og ét mistet 
program er tilstrækkelig 
grund til helt at undgå 
REPLACE-funktionen. Og 
den kan undgås meget enkelt. 
Problemer opstår, fordi der i 
virkeligheden ikke sker det, 
man umiddelbart kunne tro, 
når programmøren har revi¬ 
deret programmet og ønsker 
at gemme den nye version og 
slette den gamle. Så kan han 
skrive SAVE ” (a> PRO¬ 
GRAM”^ - hvilket vil bety¬ 
de, at det nye program er 
gemt under samme navn, 
som det gamle - i hvert fald 
indtil en vis grænse. Det gam¬ 
le program slettes nemlig ik¬ 
ke. Det nye program bliver 
gemt i et frit område på di- 
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63999 


sketten, og det registreres, at 
det gamle program ikke gæl¬ 
der mere. Gentages procedu¬ 
ren mange gange - og det kan 
der let være grund til at gøre 
under udviklingen af et nyt 
program, når man til sidst 
frem til en situation, hvor der 
simpelthen ikke er mere plads 
på disketten. 
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I den situation begynder di¬ 
skettestationen at udføre den 
såkaldte ”Gabage collec- 
tion”, hvilket vil sige, at der 
skal ryddes op i de kasserede 
programmer. Og det er her, 
det kan gå galt. Det er en 
svaghed i systemet, som den 
enkelte bruger ikke kan af¬ 
hjælpe - men man kan som 
nævnt helt undgå REPLA- 


CE-funktionen, og her er 
vort bud på, hvordan det gø¬ 
res. 


De tre programlinier, vi gen¬ 
giver her ved artiklen kan stå 
som de sidste linier i det prog¬ 
ram, man arbejder med -og 
hver gang, man ønsker at 
gemme sit program og slette 


den gamle version, skriver 
man blot RUN 63998. 

Denne instruktion vil gemme 
programmet under navnet 
"DUMMY”, hvorefter den 
sletter det oprindelige pro¬ 
gram. Men da man jo ønske¬ 
de at køre videre med det 
samme navn, døbes det nye 
program om, så det nu får det 
gamle navn igen. Voila. I li¬ 


nie 63999 kontrolleres det, 
om programmet er kommet 
rigtigt ned på disketten. 

Læg mærke til, at linie 63997 
indeholder END. Det er gjort 
for at sikre, at man ikke ved 
kørsel af programmet ufor¬ 
varende kører ud i denne lille 
REPLACE-funktion. Er 
man sparsommelig med 
pladsen, kan END skrives 


63997 

63998 
L0SE1 

63999 


OPEN 1, S, 15 '■ SAVE " DUMMV "8 : PR I NT# 1.. "SØ : PROGRAM" : PR I NT# 1, "Rø ; PROGRAM=DUMMV" : C 
VERIFV"PROGRAM",8 


Programmører må lægge 
vægt på at gøre deres 
programmer overskuelige 


Fra Rasmus og Sven Bertel¬ 
sen i Holte har vi modtaget et 
hjertesuk, der drejer sig om 
brugernes mulighed for at 
forstå indholdet af et pro¬ 
gram, som man ikke selv har 
skrevet - men som man gerne 
vil sætte sig ind i. 

Blandt andet efterlyses i 
mange programmer REM-li- 
nier og en mere konsekvent 
brug af SUB-rutiner, og selv 
om det fylder lidt mere, er det 
også et ønske at få flere mel¬ 
lemrum mellem kommando¬ 
erne i den enkelte programli¬ 
nie. 

Der er ingen tvivl om, at den¬ 
ne kritik er helt berettiget, og 
her på redaktionen vil vi ger¬ 
ne slå et slag for anbringelsen 
af instruktive REM-sætnin- 
ger, der kan gøre forståelsen 
af programmerne lettere. 
REM-sætninger kan anbrin¬ 
ges hvor som helst i et pro¬ 
gram, hvor de har den funk¬ 
tion, at de kan læses, når pro¬ 
grammet nstes - men ae på¬ 
virker ikke programafviklin¬ 
gen. Når programmet når en 
REM-instruktion, springes 
resten af programlinien gan¬ 
ske enkelt over. 

Efter REM kan man skrive, 
hvad som helst, men man må 


holde sig fra de grafiske tegn, 
fordi de ved en listning vil 
blive omskrevet til diverse 
BASIC-instruktioner. Prøv 
f.eks. at skrive en programli¬ 
nie: 

10 REM TEST 
- men hold SHIFT-tasten ne¬ 
de, mens ordet TEST skrives, 
så der kommer grafiske tegn 
på skærmen. Når linien 
LISTes, står der 10 REM 
LETVALREADLET. 


Logisk plan 

Der er næppe tvivl om, at den 
første forudsætning for, at et 
program kan få en klar og lo¬ 
gisk opbygning er, at pro¬ 
grammøren som udgangs¬ 
punkt for sit arbejde har haft 
en klar og logisk plan med sit 
arbejde. 

Selv om enhver VIC-bruger 
naturligvis helst går direkte 
til tastaturet, når et program 
skal skabes, kan det alligevel 
ofte betale sig at gå omvejen 
over et stykke papir, hvor 


man laver et rutediagram, 
som programmet skal følge. 
Det behøver slet ikke være 


noget fornemt dokument, 
hvis det kun skal bruges af en 
selv - bare nogle firkantede 
kasser, hvor man har skrevet 
op, hvilke funktioner, for¬ 
skellige dele af programmet 
skal være i stand til at udføre. 
Alene det at udarbejde et så¬ 
dant diagram kan ofte være 
med til at give en større for¬ 
ståelse for, hvilken struktur, 
programmet skal have. Man 
vil f.eks. blive klar over, om 
de forskellige blokke af pro¬ 
grammet kommer til at fun¬ 
gere som subrutiner, der kal- 

Fortsættes næste side 


Nyhed for VIC-20 


Motherboard model 2 

8 K RAM 

2 stik til standard moduler. 

Omskifter til blokadressering.Kr. 685,00 

Motherboard model 3 

Samme som model 2, men med 3 stik.Kr. 985,00 

24 K RAM udvidelse 

Modul med plads til 24 K samt en sokkel 
til 1 stk. Eprom 2732 

leveres med 4 K monteret.Kr. 485,00 

Løse 2 K RAM pr. stk.Kr. 75,00 

Bøger 

50 spil for VIC-20 

»Symphony for a melancholy«.Kr. 145,00 

30 spil for VIC-20 

»ZAP POW BOOM«.Kr. 165,00 


GRATIS: Meld dig ind i Betafon 
VIC-20 og Commodore 64 
informationstjeneste 
og modtag nyheder løbende, når der 
kommer noget. 

BEIAFON (Lørdag lukket) 

ISTEDGADE 79 -1650 KØBENHAVN V - TLF. 01 - 3102 73 
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des af de andre dele af prog¬ 
rammet. 

Subrutine 

Når man går i gang med at be¬ 
skrive indholdet af de enkelte 
programdele, vil man nor¬ 
malt blive klar over, at mange 
af operationerne gentages 
forskellige steder - og her er 
det helt oplagt at benytte sub¬ 
rutiner. 

Skal man f.eks. have én lyd, 
der kalder på brugerens op¬ 
mærksomhed i forbindelse 
med input og én lyd, der gør 
opmærksom på fejl, vil det 
være naturligt at program¬ 
mere disse én gang for alle i et 
par subrutiner, der kan kal¬ 
des fra en hvilken som helst 
del af programmet. 

Lav fra starten en liste over, 
hvilke subrutiner, der findes 
og lav hellere en subrutine for 
meget end én for lidt. 

Det er en stor fordel at bruge 
subrutiner, fordi det gør ar¬ 
bejdet med programmering 
lettere. Når først subrutinen 
er skrevet ind, skal man ikke 
gentage det samme arbejde 
igen og igen. Subrutinerne 
giver desuden større klarhed i 
programmet - ikke mindst, 
hvis man forsyner hver sub¬ 
rutine med en REM-sætning i 


starten, hvor rutinens funk¬ 
tion er beskrevet, eller blot 
har fået et navn, man kan 
genkende. 


Sparer plads 

Endelig vil der normalt være 
plads at spare ved at bruge 
subrutiner. Ved meget korte 
subrutiner er der måske ikke 
noget sparet før tredie gang, 
der er brug for den samme ru¬ 


tine i programmet - for adres¬ 
seringen tager plads - og der 
skal også være plads til en 
RETURN til afslutning af ru¬ 
tinen. 

Har man dette forhold i tan¬ 
kerne, kan der spares lidt eks¬ 
tra plads ved at placere sub¬ 
rutinerne i programmets lave 
linienumre, så der kun skal 
adresseres til 1 - eller 2-cifrede 
linienumre. Det er småting, 
men en byte sparet kan i en 


snæver vending blive afgø¬ 
rende for, om programmet 
kommer til at køre. 

En idé til efterfølgelse kan 
være at lade ethvert program 
starte med at definere de kon¬ 
stanter, der er brug for i pro¬ 
grammet - og derefter hoppe 
over afsnittet med subrutiner 
for at tage fat på det egentlige 
program fra linie 1000 - eller 
hvad man måtte finde pas¬ 
sende. 


Sådan kan du gøre livet 
lettere for dig selv: 

Lav subrutine-bibliotek 


Subrutiner er en af vejene 
frem mod en lettere og mere 
gennemskuelig programme¬ 
ring, men det kan være irrite¬ 
rende at skulle starte ethvert 
programmeringsarbejde 


BESTILLINGSKUPON TIL VI & VIC 

□ Jeg ønsker abonnement på VI & VIC. 

Prisen er 125 kr. for et års abonnement, der omfatter seks numre - frit tilsendt. 

Af de tidligere udgaver vil jeg gerne have: 

□ Nr.l - □ Nr. 3 - □ Nr. 4 - □ Nr. 5 1982 - □ Nr. 1 - □ Nr. 2 1983 


Jeg abonnerer på VI & VIC og vil gerne have en kopi af følgende programmer: 

Kassettebånd 
å 20 kr. 

Program- 
listning 
å 10 kr. 

Titel 

Omtalt i 

VI & VIC nr. 

Programmets 
omfang (bytes) 

□ 

□ 

24 TIMER 

2/1982 

2811 

□ 

□ 

7 DØGN 

2/1982 

6024 

□ 

□ 

FREKVENS 

2/1982 

2405 

□ 

□ 

ØKO-SYS 

3/1982 

3745 

□ 

□ 

VI & VIC SPIL 

4/1982 

3226 

□ 

□ 

KARAKTER 

5/1982 

1651 

□ 

□ 

BANKO 

2/1983 

3783 

□ 

□ 

4 PÅ STRIBE 

3/1982 

2406 

□ 

□ 

HAPS 

3/1983 

2501 


Desuden ønsker jeg: 

□ VIC-20 memory map (20 kr.) 4/1982 

□ BASIC 4 memory map (20 kr.) 4/1982 


Som abonnent på VI & VIC betaler jeg kun 20 kr. pr. bånd og memory map og 
10 kr. pr. programlistning. 

Beløbet, som inkluderer moms og forsendelse, vedlægges bestillingen. 

Navn: ______ 


Adresse: _ 
Postnr.: _ 


By: _ 


Kuponen sendes til VI & VIC, Kornager 29, 7100 Vejle. 


med at taste de gammelkend¬ 
te subrutiner ind. Så hvorfor 
ikke gøre det én gang for alle: 
Lav et subrutinebibliotek, 
hvor du kan hente de ønskede 
funktioner. 

Er man den lykkelige ejer af 
en Programmers Aid, er det 
ingen sag at flytte rutiner fra 
ét program over i et andet. 
Ved hjælp af RENUMBER 
og MERGE funktioner kan 
eksisterende programmer 
kombineres med hinanden, 
men selv om man »kun« har 


VlCsTOR gemmer 



en kassettebåndoptager til 
sin rådighed, er man ikke helt 
fortabt i denne sammen¬ 
hæng. 

Måden at gøre det på, kan 
være den enkle, at man i ét 
program gemmer de subruti¬ 
ner, som man tror, man kan 
få brug for i nye sammen¬ 
hænge. Lad et sådant pro¬ 
gram være starten på ethvert 
andet program, man vi lave I 
stedet for at starte program¬ 
meringen fra bar bund, star¬ 
ter man med at indlæse sit 
subrutine-program - hvoref¬ 
ter man bygger sit nye pro¬ 
gram ovenpå. 

Hvis det efter endt arbejde vi¬ 
ser sig, at der er nogle af sub¬ 
rutinerne, som man slet ikke 
fik brug for, er det jo ingen 
sag at slette dem fra det nye 
program - og det er nu én 
gang lettere at slette et antal 
programliinier end at skulle 
sidde og taste dem ind igen. 
For at få det fulde udbytte at 
et sådant subrutine-biblio¬ 
tek, er det naturligvis nød¬ 
vendigt hele tiden at føre sit 
biblioteksprogram ajour. Så 
hver ny subrutine skal altså 
skrives to gange - men så skul¬ 
le det heller ikke være nød¬ 
vendigt at skrive de samme li¬ 
nier nogen sinde mere. 
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VIC 


Et spil til VIC, hvor 
det gælder om at hapse 
uden selv at blive det 
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HAPS! 


460 POKED,42:pøKEB+C,4:NEXTF 
47ø F0RF=1TO19 : D=FHfl< 483) 


Det spil, vi her gengiver pro¬ 
gramlistningen til, bærer 
navnet HAPS, og det er net¬ 
op, hvad det drejer sig om. 
Ved spillets start skal man be¬ 
stemme sig for, hvor mange 
deltagere, der skal være med 
til spillet - og hvor mange om¬ 
gange, der skal spilles, der 
kan vælges mellem 5 forskel¬ 
lige sværhedsgrader. 


Herefter fordeler der sig en 
blanding af forskellige tegn 
over skærmen, som man skal 
»hapse« med en markør, der 
kan styres i de fire retninger. 
Men kommer man til at møde 
en stjerne, bliver man selv 
hapset og spillet er ude. 

God fornøjelse. 


lø PR I HT "T 
20 DIMPL<6>,R<5) 

30 FORV=1 TOS:F0RX=1T06:Z<X, V >=ø:NEXTX : NEXTV 
40 C=3072ø:TE=0:TS=0 
50 P0KE36379,239 
6ø CP=ø : G0T031ø 

70 PR I NTTflB < 4 >" MnDnMMMRF fi. RASMUSSEN" 

90 CP=1 

100 FORT =1T02000 : NEXTT 
110 PR I NT "71" 

120 PRINTTflB < 5 V MINSTRUKTION" 

130 PRINTTRB<5)"-" 

140 PRINT"MDU HflR 2 MIN." : PRINT"TIL AT SCORE " 

150 PRINT" M«ETN ING:":PRI NT " MC:RSR T=VENSTRE 
" PRINT"CRSR+-=H®JRE" :PRINT"F5=0P" 

16ø PRINT"F7=NED" : PRINT"SJMMBM" 

17ø PR I NTTflB U 4)" MfiMSSCOR I NG : " 

18ø PRINTTflB <14 V10 *= 1" 

19ø PRINTTAB(14>"k#*=2" 

2øø PRINTTflB<14>"!iH*=3" 

21ø PRINTTflBa4)"S9*st=5" 

22ø PR I NTTflB (14 >" »= 10" 

230 PRINT"MDU ER: 3S S" 

24ø PR I NT" MRRM IKKE EN W-5 Sfi" : PR I NT "BL I VER DU ahflPSET." 
25ø PRINTTflB C 3)" #9TR VK Pfi EN TAST" 

26ø GETfl$ : IFfli=""THEN268 

27ø PRINT"73#VOR MANGE RUNDER<1-5)" 

28ø INPUTRN:IFRN<10RRN>5THENPRINT"UH?" : G0T0270 
290 PRINT"MHVOR MANGE SPILLER<1-6)" 

300 INPUTPN: I FPNC 10RPN3-6THENPRI NT" UH?": G0T0290 
310 F0RR=1T0RN 

320 FORP=1TOPN:PRINT"SBSPILLER #";F 
330 PRINT"MS VrtRHEDSGRAD?" 

340 PRINT"TRVK ø, 1,2,3 OG 4".; 

350 INPUTS 

36ø IFS>40RS<ØTHENPRINT"UH?":G0T0340 

370 PRINT"rHSH#JEST SCORE : 1 TB : PRINT" SSVrtRHEDSGRFID : ; SL 

380 PRINT"MSPILLER #"JPB 

390 FORT=1T03000:NEXTT:PRINT"T 

4øø DEF FN fl(L)=INT(RNDG)#L)+7702 

41ø FORF=1T04ø~2#S:D=FNfl(483 > 

420 POKED,87 = POKED+C,ø:NEXTF 
43ø F0RF=1T025 : D=FNFK483) 

440 POKED,81:POKED+C,3:NEXTF 
450 FORF=1TO10+4*8:D=FNfl(505) 


480 POKED,90:POKED+C,7:NEXTF 
490 F0RF=1T014 : D=FNfi(483) 

5øø POKED,83:POKED+C,2•NEXTF 
51ø FORF =1T09+S : D=FNfl(505 > 

520 POKED,65 : POKED+C,1:NEXTF 

530 B=7932 

54ø TI$="øøøøøø" 

55ø PRINT"SJTID: ,, 112ø-IHT(TI/6ø);"ll " 

560 IFTI/6ø>=12øTHENG0TO93ø 

570 POKEB,160:PQKEB+C,6 

580 IFB<7636THENB=8229+B-7635 

5S5 IFB>3229THENB=7636+B-823ø 

59ø IFPEEK<197>=31THENH=19ø : DR=-l : GOT0630 

6øø IFPEEK<197)=23THENH=200 : DR=1 : G0T0630 

61ø IFPEEK C197)=55THENH=21ø:DR=-22 = G0T0630 

62ø IFPEEK<197)=63THENH=22ø:DR=22 

630 P0KE36878,15 : P0KE36876,H 

64ø FORT=1T03ø-5*S:NEXTT 

650 POKEB,32 : E=B+DR 

66ø SC=8 

670 I FPEEK(B > =42THENG0T079ø 
680 IFPEEK<B)=87THENSC=1 G0T0740 
690 IFPEEK C B >=81THENSC=2:G0T0740 
7øø IFPEEK(B)=9øTHENSC=3:G0T0740 
71ø IFPEEK CB)=83THENSC=5 : G0T0740 
72ø IFPEEK<B;=65THENSC=lø:G0T0740 
730 G0T0760 
74ø TS=TS+SC 

75ø P0KE36878,15 = P0KE36876,16ø+PEEK<B) 

76ø FORT=1TQ30-5#S:NEXTT 
770 PRINT"SMSCORE=";TS 
78ø G0T0550 
790 P0KE36878,15 

8øø F0RPI=lT04ø:P0KE36S76,180-PI : NEXTPI 

81ø PRINT"^lO®!MMaa S 8 S a SS IS S" 

S2ø print" aa s a ! a ! as as asai" 

830 pr i nt "aa s asas asas asas" 

34ø pr i nt" aa s a s a s a s" 

85ø pr i nt " aa sasasasas as" 

86ø pr i nt ” aa sasasasas as" 

87ø pr i nt :, aa sasasasas a sr 

880 IFCF-9THEN70 

390 P0KE36878,ø:P0KE36876,ø 

9øø FORT= 1T02000 : NEXTT: PR I NT " 73" 

91 ø PR I NT" mmS KLAREDE " i I NT < TI /6ø )-3; "II SEKUNDER " 
92ø G0TO970 

930 P0KE36878,15 : FGRflC=1T08ø:P0KE36876,21Ø-flC:HEXTflC 
94ø P0KE36376,ø:P0KE36878,ø 
9oø PRINT"73" ,/* 

96ø PRINT"$MMMMDH SM. .TIDEN ER UDLØBET.." 

97ø PRINTTflB7 6)"*WMSCORE=";T3 
98ø Z<P,R)=Z<P,R-1)+TS 
99ø IFTS>TBTHENTB=TS:SL=S : PB=P 
1 øøø PR I NT" »RUNDE # : ", R;" M" 

1010 F0RX=1T0PN 

i ø2ø PR I NT “aSP ILLER #" XX1 : Z < X, R ) 

1830 NEXTX 

lø4ø TS=ø : DR=ø : H=ø:PRINT"S" 

1000 NtXTP : NEXiR 
1066 END 
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VIC 


FORTH-ordene har 
både hoved og krop 


De enkelte bytes 


Den første byte i navnefeltet 
for READ var $84, lad os se, 
hvad de enkelte bits bliver 
brugt til: 

7 6 5 4 3 2 1 0 


11111 


tælleren angive 27 karakte¬ 
rer, men kun de 10 første ka¬ 
rakterer af navnet vil blive 
gemt. Derfor sætter vi bit 7 af 
den sidste karakter til »1«, 
således at vi kan finde enden 
på navnet. 

Længdetæller = antal bogstaver i navnet. 


SMUDGE bit. 


IMMEDIATE bit 


FORTH sproget består af 
fem nøgleelementer: Ordli¬ 
sten, interpreteren, stackene, 
assembleren og extern hu¬ 
kommelse. 

Lad os prøve at se nærmere 
på ordlistens opbygning. 
Sidst definerede vi ordet 
READ. 

: READ PADDLE CQJ'; 
FORTH gemte dette ord i 
ordlisten, så når vi for fremti¬ 
den skriver READ, vil vi få 
status af vores joystick eller 
paddleport anbragt øverst på 
stacken, men lad os se, hvor¬ 
dan ordet read egentlig ser ud 
i vores ordliste. Lad os bruge 
assembler format for over¬ 
skuelighedens skyld. 

.B YTE $84, ’rea’ ,$C4 — NFA 
.WORDBALL 4 .-- LFA 
.WORD DOCOL C-CFA 
.WORDPADDLE <~PFA 
.WORD C-FETCH 
.WORD SEMIS 


Hoved og krop 

Et FORTH ord består af et 
hoved og en krop. Hovedet 
indeholder navnet, et linkfelt 
som FORTH bruger, når 
ordlisten afsøges, samt et 
felt, der fortæller hvilken ty¬ 
pe ord det er, højniveau eller 
assembler. Kroppen er den 
egentlige definition og i et 
højniveau ord indeholder 
kroppen en række to-byte 
adresser på de definerede 
ord. I hovedet finder man 
først navnefeltet, i FORTH 
kalder man den storrage ad¬ 
resse, hvor navnefeltet star¬ 
ter for navne-felt-adressen 
NFA, disse forkortelser er 
standard i FORTH, så lad os 
bruge dem. 


I Altid »1« 


Der er fem bits til at angive 
længden på navnet, et 
FORTH navn kan altså være 
fra 1 til 31 karakterer i læng¬ 
den. 

SMUDGE betyder snavs, og 
FORTH bruger denne bit til 
at »tilsmudse« et navn, så in¬ 
terpreteren ikke kan finde det 
i ordlisten. Denne bit vil være 
»1«, medens et ord bliver de¬ 
fineret for at undgå, at et ord 
fejlagtigt refererer til sig selv. 
IMMEDIATE bitten fortæl¬ 
ler interpreteren, at et ord 
skal udføres som en kom¬ 
mando med det samme, selv 
om det under kompileringen 
findes i definitionen af et an¬ 
det ord. 


Længdetæller 

Nu er 31 karakterer jo sjæl¬ 
dent nødvendige for entydigt 
at definere et navn, det ville 
bruge alt for meget af vores 
dyrebare storrage. Man kan 
ved hjælp af ordet WITH 
fortælle FORTH, hvor man¬ 
ge karakterer af et navn, man 
ønsker at gemme i ordlisten. 
Hvis vi definerer følgende 
ord: DETTE-ER-ET-ME- 
GET-LANGT-ORD og har 
sat WITH til 10, vil længde- 


Efter navnet kommer link- 
felt-adressen LFA, i eksemp¬ 
let adressen på ordet BALL. 
LFA er adressen på det fore¬ 
gående ord i ordlisten, og vi 
forudsætter her, at vi umid¬ 
delbart før READ har defi¬ 
neret ordet BALL. LFA bru¬ 
ges til at søge gennem ordli¬ 
sten fra det ene navn til det 
næste. Ordlisten bliver såle¬ 
des afsøgt bagfra startende 
med det sidste definerede 
ord, når man når en LFA med 
adressen $0000, har man nået 
det første ord i listen, og man 
fandt altså ikke det ord, man 
søgte efter. 


Højniveau 

Det næste, vi møder, ercode- 
field-adressen CFA. CFA er 
adressen på den maskin¬ 
sprogsrutine, man udfører, 
når man skal eksekvere et 
ord. Et ord er et højniveau 
ord, når CFA indeholder 
adressen på rutinen. 

DOCOL rutinen vil tage ind¬ 
holdet af FORTH’sInterpre- 
ter-Pointer IP og gemme det 
på returstacken. Derefter vil 
DOCOL tage den første pa¬ 
rameter fra READ og an¬ 
bringe den i IP. 


Læs mere 
om 

FORTH 

Gode artikler om 
FORTH: 

DOCTOR DOBS 
JOURNAL Volume 3, 
issue 5 (may 78). 

BYTE, August 80. 

Gode bøger at starte 
med: 

Starting FORTH by 
BRODIE 

KITT PEAK PRIMER, 
BY STEVENS 

Bøgerne og særtryk af 
artiklerne kan skaffes 
gennem FORTH Interest 
Group. 


FORTH fylder mindre 

Adressen på et ords parame¬ 
terliste kaldes i FORTH Pa- 
rameter-field-adressen PFA. 
Parameterlisten er en række 
to-byte felter, der indeholder 
CFA af de definerede ord, 
det første er CFA af PADD¬ 
LE, det næste er CFA af C @ 
o.s.v. IP indeholder altså nu 
CFA af det første ord i defini¬ 
tionen af READ, nemlig 
PADDLE, og interpreteren 
vil nu begynde at udføre dette 
ord. Når FORTH ord ekse¬ 
kveres, kender FORTH altså 
CFA af de definerede ord, og 
kan derfor gå direkte til ordet 
uden at skulle lede ordlisten 
igennem først, for at finde 
navnet. Det sparer tid, for 
FORTH eksekverer da også 
mange gange hurtigere end 
Basic. 

CFA fylder to bytes, medens 
et subrutine kald i assembler 
fylder tre bytes, det sammen 
med parameteroverførslen 
via den parameter stack gør, 
at store komplekse program-l 
mer fylder mindre i FORTH, 
end hvis de blev skrevet i as¬ 
sembler. 
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VIC= 


Lavtniveau 

Lad os se, hvordan et lavtni¬ 
veau ord skrevet i assembler 
vil se ud i ordlisten, vi kan ta¬ 
ge ordet C (S), som også blev 
brugt i definitionen af 
READ: 

.BYTE$82,’C\SCO <~NFA 
.WORDTOGGLE <-LFA 
.WORD*+ 2 <-CFA 
LDA (0,X) Fetch byte ad- 
dressed by top of stack 
STA0,X Storeonstack 
STY 1,X 
JMP NEXT 

CFA peger til kode i selve or¬ 
det, som således indeholder 
den maskinsprogrutine, man 
udfører, når ordet eksekve¬ 


res. En maskinsprogrutine 
afsluttes med JMP NEXT, et 
hop tilbage til interpreteren, 
som vil eksekvere det næste 
ord, her ordet SEMIS, ma¬ 
skinsprogrutinen for semi- 
colon. 

Man kan ikke fortælle alt om 
FORTH i et par små artikler, 
men har I fået blod på tan¬ 
den, og ønsker I at vide mere 
om dette sprog, så følger der 
en litteraturliste efter denne 
artikel. 

Tilbage er der så problemer 
med at skaffe sig et FORTH 
system. Til de fleste micro 
computere kan maskinleve- 
randøren i dag skaffe et 
»nøglefærdigt« system, og 


hvis det passer til ens maskin- 
configuration og pengepung, 
er det en nem start. 


FORTH-forening 

FORTH er PUBLIC DO- 
MAIN, d.v.s. ingen kan tage 
patent på FORTH og alle op¬ 
lysninger er tilgængelige. Så 
er man interesseret i at være 
med til at opbygge og udvide 
dette sprog, kan man melde 
sig ind i FORTH Interest 
Group, en seriøs forening 
dannet i 1978, med det for¬ 
mål at udvide kendskabet til 
FORTH programmering. 


Foreningen tæller i dag mere 
end 3500 medlemmer og ud¬ 
giver bladet FORTH DI¬ 
MENSIONS. Foreningen 
udgiver desuden på non¬ 
profit basis forskellige publi¬ 
kationer, som er nødvendige 
for brugen af FORTH, f.eks. 
beskrivelse af standard ord, 
assembly liste af systemet 
m.m. Medlemskab koster i 
øjeblikket 27$ om året, det 
inkluderer bladet FORTH 
DIMENSIONS frit tilsendt 
med luftpost. 

Adressen er: 

FORTH Interest Group 
P.O. Box 1105 
San Carlos, CA 94070 
U.S.A. 


Sådan bærer man sig ad, 
hvis programmet selv 
skal ændre programmet 


Erland Tholen og Henrik 
Laulund vil gerne have et 
program til at ændre eller 
slette linier »i sig selv« under 
kørslen. De har prøvet at lade 
programmet skrive: 

100 DATA 3,3 
på en helt blank skærm, 
hvorefter de har POKEt på 
følgende måde: 198,6 

-631,19, 632,13, men pro¬ 
grammet vil ikke godtage 
sætningen, medmindre pro¬ 
grammet stoppes lige bagef¬ 
ter. 

Og her er vi netop ved sagens 
kerne. Teknikken er nemlig 
god nok - men der mangler li¬ 
ge det sidste for at det kan 
fungere. Det er nemlig tasta¬ 
turets bufferlager, der er be¬ 
nyttet - og den bliver ganske 
rigtigt først aftastet, når 
programmet standser (eller 
hvis man når en INPUT- eller 
GET-instruktion). 


Derfor er løsningen ganske 
enkelt, at man lader pro¬ 
gramlinien ende med END, 
hvorefter programmet 
standser og den ønskede li¬ 
nie, der er printet på skær¬ 
men, lægges ind i program¬ 
met. 


To problemer 

Det giver imidlertid to nye 
problemer (som vi dog kan 
løse). For det første skal 
programmet jo gerne i gang 
igen - og for det andet vil man 
gerne bevare eventuelle vari¬ 
abler i programmet. 

Det første problem er lettest 
at løse. Man lader blot pro¬ 
grammet PRINTe den nye 
ønskede linie - og nedenun¬ 
der skal programmet skrive 
"GOTO XXX”, hvor XXX 
er det linienummer, hvor 
programmet skal fortsætte. 


efter at den nye linie er lagt 
ind i programmet. 

Til de POKE-ordrer, der er 
nævnt ovenfor, skal derfor 
tilføjes endnu én, nemlig 
633,13. 

Den nærmere forklaring på 
denne teknik er, at man med 
198,6 gør VIC opmærksom 
på, at der ligger et antal (6) 
karakterer i tastaturet og 
venter på at blive udført. Der 
er plads til ti karakterer i 
VIC-20 tastaturbufferen, og 
de har nummeret 631 -640 - og 
de udføres i den rækkefølge. 
Værdien 19 står for "HO¬ 
ME”, der bringer markøren 
op i venstre hjørne af skær¬ 
men, hvorefter værdien 13 
udløses. Den står for RE¬ 
TURN og lægger altså den 
nye linie ind i programmet. 
Herefter skulle markøren 
gerne stå og blinke i linien 
"GOTO XXX”, men den 


kommer ikke til at blinke 
længe, for den næste RE¬ 
TURN udløses omgående, 
hvorefter programmet fort¬ 
sætter i linie XXX. Det er i 
øvrigt den samme teknik, der 
er anvendt i ét af de regneop¬ 
gaveprogrammer, der var i 
sidste nummer af VI & VIC. 

Variabierne 

Det andet problem ved at 
ændre programmet, mens 
det kører, er, at samtlige vari¬ 
abler vil blive slettet. Det sker 
hver gang programmet æn¬ 
dres - og det sker også, når 
man skriver RUN. Det er 
svært at forestille sig et pro¬ 
gram helt uden variabler, så 
hvis man vil lave om på sit 
program, mens det kører og 
alligevel bevare variabierne, 
må man finde på én eller an¬ 
den måde at gemme dem. 
Man kan f.eks. gemme dem 
et sted, hvor de sikres imod at 
blive slettet, og det kunne 
eksempelvis være kassette¬ 
bufferen. Her må alle variab¬ 
ierne lægges ned - og de må 
bagefter hentes frem igen. 
Det skal foregå med POKE 
ogPEEK, så det vil jo ikke li¬ 
gefrem peppe programafvik¬ 
lingen op. Men det kan lade 
sig gøre, og det er jo det vig¬ 
tigste. 


7 






Det er ikke så ligetil, men 
VIC-programmer kan 
godt komme ind i 64’eren 


Det første problem, nybagte 
Commodore 64-ejere be¬ 
skæftiger sig med, er »hvor¬ 
dan får man sine VIC-pro¬ 
grammer til at køre i 
64’eren«? 

Det kan faktisk lade sig gøre, 
men det er ikke helt uden 
problemer. For det første er 
der en række detaljer, som 
hyppigt forekommer i pro¬ 
grammerne, der skal ændres. 
Det drejer sig om de PEEK- 
og POKE-ordrer, som refe¬ 
rerer til helt bestemt pladser i 
computerens hukommelse - 
og disse pladser har ikke de¬ 
samme numre i VIC og Com¬ 
modore 64. 

Løsningen på dette problem 
er ikke morsom. Man må 
sætte sig ned med en memo¬ 


ry-map for begge computere 
og erstatte VIC-tallene med 
de tal, der gælder for samme 
funktion i 64’eren (eller om¬ 
vendt, hvis det er et Commo¬ 
dore 64-program, der skal 
over i en VIC-20). Memory- 
map til C-64 findes i bruger¬ 
vejledningen, og for VIC kan 
den f.eks. skaffes gennem VI 
& VIC (se bestillingslisten her 
i bladet). 

Det skal straks nævnes, at 
programmer, der indeholder 
maskinkode, også skal æn¬ 
dres, og her må man nok reg¬ 
ne med massive vanskelighe¬ 
der. Det er meget svært at 
skrive maskinkodeprogram¬ 
mer - og det er endnu mere 
slidsomt at oversætte dem fra 
én computer til en anden. 


Sådan LOAD’es 
programmet 

Men det er slet ikke sikkert, 
man når så langt, for der er al¬ 
lerede mange Commodore 
64-ejere, der har måttet kon¬ 
statere, at de end ikke kunne 
indlæse VIC-20 program¬ 
merne fra kassettebånd i de¬ 
res nye computer. 

Forklaringen er, at Commo¬ 
dore 64 har meget mere at se 
til, når et program indlæses - 
og det betyder, at TIMIN¬ 
GEN er meget mere kritisk, 
end tilfældet er for VIC-20. 
Derfor er man nødt til at gå en 

omvej for at nå sit mål. Om¬ 
vejen hedder diskettestatio¬ 
nen - og det kan naturligvis 


være en ubehagelig erkendel¬ 
se, hvis man ikke kan komme 
i nærheden af sådan en sag. 
Men fremgangsmåden er 
som følger. Programmet ind¬ 
læses i VIC-20, hvorefter det 
lagres på diskette. Fra denne 
diskette skulle Commodore 
64 være i stand til at læse 
programmet - og så kan man 
gå i gang med at foretage alle 
de ændringer, der er nødven¬ 
dige for, at det kan komme til 
at køre. 


RUN ikke 

Her er det måske på sin plads 
at advare mod at RUN’e 
programmet i Commodore 
64, inden det er ændret. En 
forkert POKE-ordre kan 
nemlig sende computeren i 
coma, så man er nødt til at 
slukke for den og starte helt 
forfra. Klogest er det, hvis 
man først foretager sine ret¬ 
telser, derefter lagrer det re¬ 
digerede program - og først 
derefter prøver, om det kører 
som det skal. 


Program på 



VlC‘Zo 


ret 

peek 

oq 

poke 



pa diskette 



Dansk karaktersæt findes 
også til Commodore 64 


En VIC-20 bruger, der har 
haft glæde af et dansk karak¬ 
tersæt, er nu gået over til 
Commodore 64. Det giver 
anledning til spørgsmålet, 


om det danske karaktersæt til 
VIC-20 også kan bruges til C- 
64. 

Det kan det ikke, men det fin¬ 
des tilsvarende til Commo¬ 


dore 64, og det repræsenterer 
endda en forbedring i for¬ 
hold til VIC, idet Æ, 0 og Å 
bliver flyttet hen på de rette 
pladser på tastaturet - som 


Om de danske karakterer har 
vi også fået et brev fra Verner 
Madsen i Rødovre. Han un¬ 
drer sig over, at man ikke kan 
få små og store Æ, 0 og Å, 
men vi kan glæde ham med, 
at det faktisk kan lade sig gø¬ 
re. Bare ikke fra tastaturet. 
Men tegnene findes, og de 
små bogstaver er CHR$-vær- 
dierne 91,92 og 93, og de sto¬ 
re har værdierne 219, 222 og 
221 for henholdsvis Æ, 0 og 

Å. 
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Monitorprogram til 64’eren 
- men det kan også bruges 
i forbindelse med VIC-20 


Måske har du fulgt med i se¬ 
rien omkring maskinsprog. 
Begreber som disassembler 
og assembler er afløst af ord 
som compiler og monitor. 
Dette program er et eksempel 
på den sidste slags: monitor¬ 
programmet. 

Her i bladet er forskellige 
aspekter omkring maskin¬ 
programmering allerede be¬ 
lyst. Det er naturligvis sket 
med udgangspunkt i 
VIC-20’s mikroprocessor. 
Det er den såkaldte 6502. I 
Commodores Commodore 
64 sidder en 6510 processor. 
Heldigvis for os er deres ma¬ 
skinkodeordrer identiske. 
Det har meget stor betydning, 
når vi skal lave programmer 
om fra f.eks. VIC-20 til 64- 
modellen. Og det betyder og¬ 
så, at det følgende program: 
”Monitor*64” med ganske 
få ændringer - som vi skal 
komme tilbage til - kan løbe 
på begge modeller, 
det er skrevet i Commodore 
BASIC. Det er derfor ikke 
særligt hurtigt, men det 
strækker alligevel et godt 
stykke. Det har alle de vigtig¬ 
ste ordrer, som f.eks. kendes 
fra VICMON. Men ikke det¬ 
te programs finesser. 

Programmet er godt til at læ¬ 
re maskinprogrammering at 
kende i praksis. Og det sætter 
dig i stand til at skrive, erstat¬ 
te og gemme maskinpro- 
grammer på 64’eren (VIC- 
20) i forbindelse med en re- 
corder. 

Samtidig giver det et par me¬ 
get anvendelige subrutiner, 
som du kan bruge i andre 
programmer. Nu er det vist 
tiden, at du får mere at vide 
om selve programmer. 


Programfunktionerne 

Programmet byder på otte 
ordre, der giver adgang til at 
manipulere med indholdet af 
de RAM (Random Access 
Memory) bits, der er ladet op 
efter maskinens opstart. 

M xxxx yyyy - viser memory 
fra position xxxx til yyyy 
; HHHH - placerer hex-kode 

NN,MM.osv. i memory 

fra position HHHH 

G HHHH - udfører pro¬ 
grammet fra adressen 
HHHH 

L filenavn - lader program¬ 
met fra recorder ind i memo¬ 
ry på den angivne absolutte 
adresse 

S filenavn - saver maskin- 
programmet på bånd 
D DDDD - konverterer deci¬ 
maltal op til 65535 til hex 

H HHHH - konverterer hex- 
tal til decimal 

X - ud af monitorprogram¬ 
met 

Jeg skal nu belyse de enkelte 
ordrer og deres eventuelle an¬ 
vendelse. De er alle ret sim¬ 
ple, og giver derfor kun ad¬ 
gang til de allermest nødven¬ 
dige funktioner for at få gang 
i maskinprogrammering. 
Men de virker, og vil give et 
godt begyndergrundlag. 


M xxxx yyyy 

Når man vil arbejde i maskin¬ 
sprog, foregår det i det så¬ 
kaldte hexidecimale talsy¬ 
stem, som er omtalt i tidligere 
numre af VI & VIC, nr. 
45.10.1982). De enkelte cel¬ 
ler i RAM indeholder - eller 
kan indeholde - tal fra $0 ($- 
tegnet angiver, at der er tale 


om et hex-tal) og til $ FF. Det 
svarer i decimaltal til 0-255. 
Altså 256 forskellige vær¬ 
dier. 

Det er disse informationer, 
programmet giver adgang til 
at manipulere med. Ovenstå¬ 
ende kode fremkalder hex- 
tallene fra memory-positio- 
nen xxxx til yyyy. Begge tal er 
i hex og angiver startadressen 
på en programlinie på ialt fire 
hex-tal. 

Vil man f.eks. se, hvad 
RAM-cellerne indeholder fra 
position $C000 til $C019, ta¬ 
ster man først et M så et mel¬ 
lemrum og $C000. Mellem¬ 
rum igen og $C019 efterfulgt 
af et tryk på RETURN. Pro¬ 
grammet viser nu: 

;C000 FF 4F BO 00 FF 
;C005 4F BO 00 FF 4F . . . 
osv. indtil 

;C019 4F BO 00 FF 4F 


Den stump program, som er 
afdækket, viser sig at være en 
cyklus. Den befinder sig på 
positionen 49152 (C000), der 
er starten på hele 4K RAM, 
som er afskåret fra det områ¬ 
de, hvor BASIC-program- 
met når ind. 

På 4K RAM - dette gælder 
naturligvis kun for C 64 - kan 
der stå en god mundfuld ma- 
skinprogram. Nok til selv 
den mest kræsne nybegyn¬ 
der. 

Vil man på VIC-20 bruge det¬ 
te program, må man bruge 
den sædvanlige afspærring¬ 
steknik, så maskinprogram- 
met ikke overskrides. Eller 
bruge de relativt få R AM-cel- 
ler, der kun bruges sjældent. 
$C000 kan altså bruges til at 
gemme maskinprogrammer 
i, som vi senere skal se. 


; HHHH 

Denne ordre udføres ved at 
skrive semikolon mellemrum 
og hex-adressen, hvor man 
ønsker at placere sine nye in¬ 
formationer. Man skriver 
f.eks.: 

; C000 20 FD AE 20 9E 
og RETURN. Det bevirker, 
at indholdet af denne »pro¬ 
gramlinie« nu står i RAM- 
positionerne $C000 og frem 
til SC004. 

I praksis vil man kun sjæl¬ 
dent bruge denne ordre. Det 
er næsten udelukkende til at 
foretage rettelser. I stedet vil 
man bruge følgende frem¬ 
gangsmåde, når man vil 
skrive et nyt program ind 
over det eksisterende fra lad 
os sige $C000 til SC01E: 

M C000 COlE-ordren bruges 
til at vise indholdet af RAM. 
Derefter bruger man C64- 
erens curser-funktion til at 
finde tilbage til den første 
adresses hex-indhold og 
overskrive dette med det nye 
indhold. 

Efter hver linie trykkes RE¬ 
TURN. Ser man nøjere på li¬ 
nien, svarer indholdet jo net¬ 
op til det, man ville have op¬ 
bygget med »semikolon-or¬ 
dren«. 

På dette sted var det måske på 
sin plads at komme med en 
ADVARSEL: Det er byden¬ 
de nødvendigt, at en maskin- 
rutine afsluttes med en »re¬ 
turn« ordre. Den er i 
mnemonic-kode RTS og i hex 
60. Eller maskinprogrammet 
skal slutte med en hop-ordre 
til en BASIC-ordre eller an¬ 
det maskinprogram. Men så 
skal dette program afsluttes 
med en RTS-ordre. Ellers 
kan du ikke stoppe din com¬ 
puter - kun slukke. 

Det er derfor også altid god 
latin at spille sit program ind 
på bånd, inden man første 
gang afprøver det. Der er 
ALTID fejl i. Flere tusinde 
taster har ofte været berørt 
inden et program er inde - det 
gælder også dette program - 
og der vil være fejlslag imel¬ 
lem. 
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VIC 


G HHHH 

Når man så har puslet sig 
frem til en maskinkode, som 
man har fået anbragt i RAM, 
kommer det store øjeblik, 
hvor man skal afprøve den. 
Men også her er der fælder. 
En af de stygge er, at man har 
glemt, at der faktisk spørges 
til parametre i rutinen eller 
programmet. Dette program 
åbner mulighed for at indgive 
dem. Men - indrømmet - på 
en ret kluntet måde. 

Man starter med at skrive H 
og mellemrum efterfulgt af 
den fircifrede hex-adresse 
f.eks. $C000 og RETURN. 
Maskinen svarer nu med at 
oplyse, hvilken adresse, man 
har valgt, hvilken komman¬ 
do, og om der er ekstra para¬ 
metre knyttet til ordren. Man 
bekræfter med J/N, og ma¬ 
skinen svarer hvis J: Er para¬ 
metrene læst ind? Havde 
man svaret N lige før, var 
ordren udført fra $C000. 
Hvis man på det sidste 
spørgsmål svarer J, udføres 
ordren som ovenfor. Hvis det 
er et N, sker der følgende: 
Maskinen viser to instruktio¬ 
ner, som man skal følge. Der¬ 
efter går den ud af monitor¬ 
programmet og er klar til, at 
man retter i selve programli¬ 
nie 680 i basic-programmet. 
Ret i linie 680 og RETURN 
og GOTO 680 (- står der). Og 
det er faktisk lige, hvad man 
skal. Men det er VIGTIGT 
ikke at rette i den første del af 
linie 680. Der skal kun rettes 
fra slutningen af (BR * 4096). 

I det viste eksempel, som 
knytter sig til et lille program i 
maskinsprog, som giver or¬ 
dren PRINT, er der tre para¬ 
metre, som skal ind adskilt 
med komma. 

Den fulde linie skal derfor 
hedde: 

680 SYS R + (BR*4096), 
15,20,”PRØVE” 

Denne linie bevirker, at der 
skrives PRØVE i kolonne 15 
linie 20. Smart, ikke? 

For at få rettelsen ind i maski¬ 
nen - altså de tre parametre, 
må man taste RETURN, som 
bevirker at linie 680 i basic- 
programmet nu har dette ind¬ 
hold. For at spare endnu en 


opstart forfra i programmet, 
kan man derefter taste GO¬ 
TO 650 og programudførel¬ 
sen starter, som havde man 
tastet G C000 efter RUN-op- 
starten. 

L file-navn 

Med denne ordre er du i stand 
til at lagre et maskinprogram 
på et ganske bestemt sted i 
RAM. Det forudsætter, at du 
har savet programmet ved 
hjælp af s-ordren. 

Med i denne artikel - eller på 
det bånd, som kan købes af 
programmøren - er et lille 
maskinprogram. Hvis du 
bruger L filenavn på båndet, 
vil du få indlæst PRINTØfra 
$C000. 

Ordren bruges på følgende 
måde: L mellemrum anførel¬ 
sestegn (”) navnet på filen - i 
dette tilfælde PRINT(i3>- og 
anførelsestegn efterfulgt af 
RETURN. 

Kan du ikke huske, hvilken 
file, du søger, må du bruge en 
»snyde-kode«. Tast L ”” og 
RETURN. Du får herefter 
indlæst det næstfølgende ma¬ 
skinprogram, som du kan 
vælge at kontrollere med M- 
ordren eller udføre med G- 
ordren. 

Men er du klar over, hvilket 
program du søger, bruger du 
L »filenavn« og båndet kører 
indtil den har fundet pro¬ 
grammet. 

S filenavn 

Denne ordre saver et pro¬ 
gram kaldet »filenavn«, 
f.eks. PRINTe. Du får brug 
for den, når du har tastet 
BASIC-programmet ind og 
har afluset det for de fejl, 
som der altid er efter tusind¬ 
vis af indtastninger. 

Ordren udføres: S mellem¬ 
rum anførelsestegn (”) file 
navnet og anførelsestegn ef¬ 
terfulgt af RETURN. 

Mit råd til dig er: Inden du 
kører løs med programmet, 
tag da en KOPI. Du loader 
simpelthen programmet, 
hvis du har købt det færdigt. 
Eller du taster det ind. 
SAVEer det. Retter det til og 
SAVEer det færdige pro¬ 
gram. 


Når programmet kører uden 
problemer, tager du en kopi: 
Sluk maskinen. Load pro¬ 
grammet. Tag kassetten ud 
og sæt en ny tom kassette i. 
SAVE »Monitor*64«, og du 
står nu med en arbejdskopi, 
hvor du kan tillade dig at be¬ 
gå en bommert på. Sker det, 
så tag en ny kopi af origina¬ 
len. Men tilbage til S- 
kommandoen. 

Når du har udført den lille 
stump maskinprogram og 
indlæst den som beskrevet 
under M xxxx yyyy og ; 
HHHH-kommandoerne, 
kan du SAVE den. Den lagres 
nu under denne specifikke 
file-adresse og lagres altid i de 
angivne RAM-celler. 

Tast S ”PRINT@P og RE¬ 
TURN. C-64 svarer med sa¬ 
ver S ”PRINT@” 

Noter tæller på recorder og 
navn på maskinprogrammet 
på et stykke papir og TAST 
(betyder rør en tilfældig tast, 
når instruktionen er udført 
som beskrevet). 

Maskinen svarer nu med: 
Start i hex HHHH (du svarer 
med f.eks. C000 og RE¬ 
TURN) 

Slut i hex HHHH (du svarer 
f.eks. C019 og RETURN) 
Programmet sørger nu for at 
indlæse netop denne del af 
Commodore 64’s program. 
Og har du indlæst - indtastet - 
maskinprogrammet for 
PRINT (a} som beskrevet 
ovenfor, har du nu en bånd¬ 
kopi af programmet, som du 
senere kan indlæse. 

På denne måde kan du indlæ¬ 
se en lang række ekstra BA¬ 
SIC ordrer, som du kan bru¬ 
ge med SYS-kommandoen til 
enhver tid efter de er indlæst. 
Husk eventuelle parametre. 

I dette tilfælde skal du skrive 
et linienummer og SYS 
49152. Eller blot SYS 49152, 
hvis det ikke er i et program. 

DDDDD 

Ordren giver dig adgang til at 
få konverteret et decimaltal 
mellem 0 og 65535 til hex-tal. 
Ordren udføres med D 
RETURN og CMB64 svarer 
med: dec til hex? og du indta¬ 
ster f.eks. 65535 RETURN 
og der svares HEX FFFF. 


H HHHH 

Her får du hjælp til at omsæt¬ 
te et hex-tal til decimal. 
F.eks. sådan: tast H og RE¬ 
TURN og Commodore 64 
svarer Hex til dec? Du taster 
f.eks. C000 og maskinen sva¬ 
rer decimal 49152. 


X 

Endelig er der X-ordren, der 
kun tjener til at bringe dig ud 
af programmet og tilbage til 
programmerings-mode. Ved 
at taste RUN er du igen i 
MONITOR+64, forudsat du 
ikke har brugt BASIC-kom- 
mandoen NEW. 


Indlæsning 

Programmet er lige til at taste 
ind fra den viste liste. Når det 
er sket, eller programmet er 
læst ind fra bånd, SAVEs 
det, inden man begynder at 
rette. Der forekommer 
POKE og SYS ordre i pro¬ 
grammet, og erde tastet for¬ 
kert ind eller fodret med for¬ 
kerte tal af programmet selv, 
kan man få svært ved at stop¬ 
pe programudførslen. Der¬ 
for SAVE inden RUN første 
gang. 

Når programmet kører og er 
SAVEet for sidste gang bru¬ 
ges RUN, og man er nu i 
MONITOR*64. Det første, 
man ser, er en præsentation 
og en menu. Denne menu 
kommer man tilbage til hver- 
gang man taster N (Ny) i 
programkørslen, som vist på 
skærmen. 

Programbeskrivelse 

Der bruges i programmet fle¬ 
re gode BASIC-rutiner, som 
kan anvendes i andre pro¬ 
grammer. Jeg skal blot næv¬ 
ne nogle få af dem. 

Linie 950 er starten på en lille 
rutine, som C-64 kan bruges 
til at kontrollere om nogen af 
knapperne på recorderen er 
trykket ned. Er de det, vil 
PEEK(l) antage en værdi 
forskellig fra 55. 

Linie 9999 giver en effektiv 
rutine for omsætning mellem 
et tal i hex og et decimaltal. 
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VI Cr 


Sådan får du 
Monitor*64 til 
at køre på VIC-20 


Her er nogle tips til, hvordan 
du får programmet MONI- 
TOR*64 til at køre på en 
VIC-20. Der er flere ting, der 
skal tages i betragtning. Og 
du må eksperimentere dig 
frem med hensyn til opstil¬ 


ling af en ny »menu« og an¬ 
dre udsagn, som er opstillet 
efter Commodore 64’s 40 ko¬ 
lonner pr. linie. 

Jeg skal her nøjes med at give 
oplysninger om de POKE- og 


PEEK-kommandoer, som 
forekommer. De er ret få og 
derfor overkommelige at ret¬ 
te. 

Linie 10 erstattes med: 

10 POKE 36879,8 (det giver 
en sort skærm). 

Linie 110 erstattes af: 

110IF CM = ”X” 
THENPRINT”shift/clr 
CTRL7” :POKE36879,27 

Linierne 315 og 320 erstattes 
med: 

320 POKE36878,15: 
POKE36876,215:FORX = 

1TO250: NEXT: POKE 
36876,0 


Linierne 674, 676, 680, 685 
erstattes af: 

680 SYS DC, 15, 

20,"PRØVE” 

685 SYS DC 

Linierne 960 og 970 erstattes 
med: 

960 IF(PEEK(37151) 
AND64) = 0THEN 
PRINT”TRYK STOP PÅ 
KASSETTE” 

970 IF(PEEK(37151) 
AND64) = 0THEN970 


Et praktisk 
eksempel 


PRINT(a)er en kommando, 
man kan støde på i program¬ 
lister. Men den standard BA¬ 
SIC, Commodore 64 er ud¬ 
styret med, har ikke denne 
mulighed for på en nem måde 
at placere et stykke tekst eller 
en række tegn på en ønsket 
position. 

Vil man gøre noget sådant, 


har man muligheden for at 
bruge en række curserbevæ- 
gelser indesluttet i anførel¬ 
sestegn. Men det tager plads, 
og er ikke særlig handy. 

Den efterfølgende stump ma- 
skinrutine i hexkode giver 
denne nye kommando som et 
supplement. 


PRINTfåbruges således: 
SYS 4 9 1 5 2 , x , y , 
”tekst/tegn” 

Glemmer man parametrene, 
får man "Syntax error”. X- 
et står for kolonne, f.eks. 15. 
Y-et står for linie, f.eks. 20. 
Og i programmet MONI- 
TOR+64 bruger vi desuden 
"prøve” som et eksempel på 
en tekst, som skal placeres. 

Denne nyttige ordre kan også 
bruges til at slette en del af 
skærmens billede med. 
F.eks. således: 


2000 FORY = 0TO15: 
SYS49152,0,Y,” 

(40 eller mindre mellemrum) 
”:NEXT 

Her følger hexkoden, som du 
kan indlæse med MONITOR 
*64 programmets M XXXX 
YYYY og/eller; HHHH 
ordrene: 

C000 20 FD AE 20 9E 
C005 B7 8A 48 20 FD 
C00A AE 20 9E B7 68 
C00FA8 18 20 F0 FF 
COM 20 FD AE 4C A4 
C019 AA 00 00 00 00 
Programmet er kun anvende¬ 
ligt på 64-modellen. 


Her er nogle af 
de »mystiske« tegn 
i programmerne 


Det kan være let nok at taste 
et program ind i VIC så længe 
det bare drejer sig om at 
skrive tal og bogstaver, men 
når de forskellige grafiske 
symboler skal tydes, kan der 
let opstå vanskeligheder. 

End ikke brugervejledningen 
for VIC-20 indeholder en 
oversigt over de anvendte 


grafiske tegn for funktions¬ 
tasterne F1-F8 sådan som de 
ser ud, når de forekommer på 
skærmen eller i en program¬ 
listning. Det er lettere at refe¬ 
rere til disse taster, hvis man 
kan slippe for at spekulere 
på, hvilken ASCII-kode, de 
har. 

På samme måde har det givet 


anledning til visse vanskelig¬ 
heder, at tegnet for »CUR¬ 
SOR TIL HØJRE« på skær¬ 
men ses som en negativ, kan¬ 
tet slut-parentes. Det er den, 
der sidder på samme tast som 
semikolon. Men i mange 
programudskrifter får man i 
stedet et dansk Å - også nega¬ 
tivt. 

Forklaringen er naturligvis 
den enkle, at printere med 
danske bogstaver må udelade 
nogle af de eksisterende tegn, 
og her er det altså gået ud over 
den nævnte parentes - mens 
det engelske pund-tegn må 
lade pladsen til fordel for 0, 
og den kantede start-paren¬ 
tes er erstattet med Æ. 


I håb om, at det kan gøre livet 
lidt lettere for VIC-brugerne, 
gengiver vi her de tegn, der 
oftest giver anledning til 
problemer (inklusive det ne¬ 
gative Å). 


CURSOR OR = " ,T 

CURSOR HEP = 

CURSOR TIL HØJRE = "'il 
CURSOR TIL VENSTRE = "»i 
HOME = "S 

FUNKTIONSTAST El * "■ 
FUNKTIONSTAST F 2 ■= "S 

FUNKTIONSTAST F 3 = "S 

FUNKTIONSTAST F 4 = "li 

FUNKTIONSTAST F 5 = "!« 

FUNKTIONSTAST F 6 = "M 

FUNKTIONSTAST F 7 = "li 

FUNKTIONSTAST F S = "■ 
RVS ON = "3 

RVS OFF = "B 
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10 P0KE53288,0:P0KE53281, ø 

20 PRIMT"rirøflSSIfffiSflWIilMiStifrMl 8***9 MONITOR l.i * S4'jT i ; , l:S»**5'' 

25 PR I NT " MBWHWKWCOPVR I GHT : F r L. LERBAEK" 

30 FORX= 1T03000 : MENT 
32 G0SUB950 
35 OOSUBSØøø 
4ø OOSUBSØØØ 
50 CM*=MID$<IN$,2, 1) 

6ø IFCMf-"M"THEHGOSUB150■G0T04øø 
?ø I FCM*= "; " THEHGOSUB 150 • G0T0550 
80 I FCM$= " G " THENF'R I NT " 23" : G0T0650 
9ø I FCMf= " L " THENPRI NT " 23" = G0T0700 
løø I FCM$= " S " THENPR I NT " 23" ■GOTOløøØ 

llø IFCM$="X"THENPRI NT"2X3" : P0KE53200,14:P0KE53281,6:END 

12ø I FCM$« " H " THENPR I NT " 23" : GOTO9999 

13ø IFCM*= " D " THENPR I NT " 23" : GOTO 10050 

150 IFF=1THENRETURN 

160 PRINT"23" : RETURN 

300 REM **#ERROR#** 

31ø PRINT" arø ERROR Hf" 

315 P0KE54296,15:P0KE54277,190=P0KE54278,248 

320 P0KE54273,34:P0KE54272,75:P0KE54276,33:FORX-1T0230 : HEXT:P0KE54296,0 

330 G0T040 

400 REM*##M-KOMMANDO*** 

410 F-0 : ST$*MID$ < I N$, 4,4 ) 

42ø FI*=»MID*aN*,9,4> 

425 PRINT:PRINT"MASKINKODE pRfl "JST*," TIL M ;FI$. 

430 HX*«ST$:G0SUB2000 ; S1=DC : IFERTHEN300 
440 HX$=F I % : G0SUB2000 : FI=DC ; IFERTHEN300 

450 RD-S1 

455 GETA*:IFA*=" "THEN40 

460 PRINTCHRf<13)"I 

470 DC=AB:Q0SUB2200:PRINTHXf" " ; 

430 SL*=AD : FL=AB+5 
49ø FORAL=SLTOFL-l 

500 DC-PEEK < AL ) ; G0SUB21øø : PRINTHXf; = IFALCFL-1THENPRINT'* "; 

510 NEXTAL 

520 AD-FL:IFADCFI+1THEN455 

525 G0SUB900 

520 PRINT"«'! XXXX VVVV" 

530 F*1 : G0T040 

55ø REM*#*;-KOMMANDO*** 

560 AD$-MID#<:iN$,4,4> 

565 PR I NT : PR I HT " JSFLACERER HEX-KODE I ADRESSE " ; AD$ 

566 PRINT ; FRINTIN$ 

570 HX*«AD*:G0SUB2000:IFERTHEN300 

575 AD-DC 

580 FORAL-1 TOS 

590 HX$=MID*(IN*,6+3*AL,2>:00SUB2000 

600 IFERTHEHSøø 

61ø POKEAB+AL-1,DC 

62ø NEXTAL 

625 G0SUB900 

623 PRINT"«; XXXX" 

63ø F=1:G0T040 

650 REM*#*G=KOMMANDO**** 

660 HXf=MIDTCIHf,4,4) 

665 PRINT:PRINT"UDFØRER KOMMANDO FRA ",HXT 

666 PRINT : PRINTIN* 

670 00SUB2000:IFERTHEHSØØ 
674 BR*INT<DC/4096> 

676 R»DC-CBR*4096) 

670 G0T0050 

600 SVS R+C BR*4096),15,20,"PRØVE" 

601 G0SUB900 

682 PRINT"MG HHHH":G0T040 
695 SVS R+<BR#4096) 

686 G0SUB900 

690 PRINT"MG HHHH":G0T04ø 
700 REM###L-KOMMANDO#**** 
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703 PRINT ; PRINT"MINDLAESER "JlNf 
710 NM#*"":PT=3 

720 IFMID$ <1Nf,PT,1> OCHRf C 34 ) THENNMf»M I Df < I Nf , 5, PT-4 ) : PT-PT+1 • G0T0720 
740 0PEN2.. 1,0,NMf 

743 PRINT"FUNDET "j NMf i CHRf< 13 > " INDLflESER " 

75ø IHPUT#2,flD,FI 
760 FORCA-ADTOFI 
770 INPUT#2,ET 
780 PQKECA, BT 
790 NEXTCA 
900 CL0SE2 
803 G0SUB900 

806 G0SUB950 

807 PRINT"M_ FILE-Nfl'v’H" 
ølø G0TG40 

850 REM***PARAMETRE*** 

86ø PRINT"ER DER EKSTRA PARAMETRE? J/H" 

870 GETPAf : I FPAf= " " THEN870 
872 I FPAfO " J "ANDF’Af O "N " THEN870 
874 IFF'Af = " N" THEN685 

880 PRINT"ER PARAMETRE LAEST IND? J/N" 

882 GETPAf : IFPAf=""THENS82 
884 I FPAfO " J "ANDPAf-O " N " THEN882 

886 I FF'Af= " J " THEN680 

887 PRINT"»RET I LINIE 680 OG SRETURNS OG GOTO 65ø" 

888 IFPAf*"N"THENLIST68ø 
9øø REM***NV/OAMMEL*** 

910 PRINT : PR I NT" »KOMMANDO '■ SAMME STASTH - NV BUH" 

92ø GETSPf:IFSF'f -""THEN920 
93ø IFSPf-"N"THEN35 
940 RETURN 

95ø REM***SLUK FOR RECORDER*** 

960 IFPEEK < 1) OS5THENPRI NT" TR VK S3T0PH PAR RECORDER" 

97ø IFPEEK < 1 ) OS5THEN970 
980 RETURN 

1000 REM***S-KOMMANDØ***** 

1005 PRINT:PRINT"»SAVER ";INf 

1006 PRINT"»HOTER TAELLER F'AA RECORDER OG NAVN PAA MASKINPROGRAMMET "i 

1007 PRINT" OG BfTRSTH" 

1008 GETSPf : IFSPf=" "THENløøø 
lølø NMf«""■PT=5 

1020 IFMIDf<INf, PT, 1 )OCHRf <34 ) THENNMf-MI Df< I Nf, 5, PT-4) : PT=PT+1 : GOTO 1020 
1030 PR INTCHRf < 13 ) " START I HEX HHHH >" i ■ G0SUB3010 
1040 HXf*MIDf< INf,2) '■ G0SUB2000 : IFERTHEN300 
1030 Sl-DC 

1060 PR INTCHRf C 13 ) " SLUT I HEX HHHH > " ; : G0SUB3010 
1070 HXf-M IDf <INf,2 >: G0SUB2000IFERTHEN300 
lø8ø FI-DC 

1090 PRINTCHRf<13)=0PEN2,1,1,NMf■PRINT"SKRIVER ";NMf 

1100 PRIHT#2,S1 
1110 PRINT#2,FI 
1120 F0RRD-S1T0FI 
1130 PRINT#2,PEEKXAD) 

1140 NEXTRD 

1150 CL0SE2 

1151 G0SUB950 

1132 PRINT"»B FILE-NAVN" 

1133 00SUB900 
1160 00T040 

1200 REM***D-K0MMAND0****** 

1210 HX"«" " : PT-4 
1213 INf-INf+" " 

1220 IFMIDf< INf, PT, 1)0" "THENHXf-MIDf (INI, 4, PT-3) ^PT=PT+1 :G'0T0122ø 

1230 00SUB2000 

1240 PRINTCHRf<13);DC 

1230 G0T040 

1400 REM***H-KOMMANDO******* 

1410 DCf-"":PT«4 
1413 INf-INf+" " 

1420 IFMIDf<INf,F'T, 1)0" "THENDCf-MIDf<INf,4,PT-3) ; PT+1 : GOTO 1420 
1430 DC-VAL <DCf ) : 00SUB2200 
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1440 PRINTCHR*C 13>;HX* 

1430 GOT040 

2000 REM*#*HEX TIL DEC*##**** 

2ølø ER»0•DC*ø : FORI-ØTOLEN<HX*)-1 
2020 Dl *ASC < MID* C HK*, LEN < HX* )-I , 1 > 

2030 IFD1>22THENER“1 : RETURN 
2040 IFD1>9THEND1=D1-7 
2050 DC=DC+D1*16 TI:NEXTI 
2060 RETURN 

21øø REM#*#DEC TIL HEX<2)###*# 

2110 HX*«"" : FORI»1T02 
212ø Q»IHT <DC/16/ : R=DC-1S*Q+48 
2130 IFR>57THEHR=R+7 
2140 HX*®CHR*<R)+HX* : DC-Q : NEXT 
2150 RETURN 

22øø REM#**DEC TIL HEX <4>#**** 

2210 HX*«"" ; FORI®1T04 
2220 Q«INT<DC/16>'R*DC-1S*Q+48 
2230 IFR>57THENR«R+7 
2240 HX*«CHR* < R)+HX* ■■ DC«Q : NEXT 
2250 RETURN 

3øøø REM***INPUT FRA KEVBORD*** 

5005 PRINTCHR*<13)">"; 

5010 OPENl,ø 
5020 INPUT#1,IN* 

5030 GLOSE1 

5040 IFLEFT* C IN*,1)O">"THENIN*«">" +1N* 

5050 RETURN 
6øøø REM#**MENU*** 

6øøl PRINT" ITBHFØLGENDE ORDRE ER MULIGE: CKLAR 8TASTB)" 

6010 PRINT"»1 XXXX VVVV - VISER MEMORY FRA X TIL V 
6020 PRINT"«; HHHH - PLACERER HEX-CODE'iMN MM.." 

6025 PRINT" I MEMORY FRA HHHH I HEX" 

6030 PRINT"BG HHHH - UDFØRER PROGRAMMET 

6040 PRINT"BL FILE-NAVN - PROG. FRA BAAND IND 
6050 PRINT"IB FILE-NAVN - SAVE'ER PROG. TIL BRAND" 

6060 PR I NT "BID DDDD - DEC. TIL HEX" 

6070 PRINT"BH HHHH - HEX TIL DEC." 

6øøø PR I NT "BIX - UD AF MONITOR" 

6030 GETA* : IFA**""THEN6090 
7000 RETURN 

9999 REM###HEX TIL DEC*** 
løøøø PRINT : PRINT"BHEX TIL DECIMAL" 
løøøl PRINT:PRINT" 

10005 INPUT"BHEX TIL DEC";H* 

10007 DN-0:FORH-lTOLEN(H*> 

10010 DN-DN+<ASC<MID*CH*,H,1)) -48+ <ASC<MID*CH*,H,1>)>57>*7>*(161<LEN<H*>-H>) 
10020 NEXTH 

10030 PR I NT "BIDECIMAL " ; DN 
10032 G0SUB900 

10035 PRINT"BH - HEX TIL DECIMAL" 

10040 G0T040 

10030 REM***DEC TIL HEX*** 

10052 PRINT:PRINT"DECIMAL JIL HEX" 

10055 INPUT 11 WTiEC TIL HEX"; DN 
10057 IFDN>65535THEH10055 
10060 N1=1NT(DN/4096> 

10070 D2=DN-N1*4096:N2=INT <D2/256) 

10080 D2=D2-N2*256:N3=INTCD2/16) 

10090 D2=D2-N3*16 : N4=D2 
10100 H*=CHR*(N1+48-<N1>9>*7) 

10110 H*=H*+CHR*<N2+48-CN2>9>*7 ) 

10120 H*=H*+CHR*<N3+48-<N3>9)*7 > 

10130 H*=H*+CHR*CN4+48-<N4>9)*7> 

1 ø 140 PR I NT " BHEX'sl" ; H* 

10142 G0SUB900 

10144 PRINT=PRINT"D - DECIMAL TIL HEX" 

10150 GOTO4ø 

READY. 


I HEX" 

FRA HHHH" 
I MEMORY" 


-48 


Den 

nemme 

måde 

Vil du ikke bruge tid på 
indtastning og fejlfinding 
med mere, kan forfatte¬ 
ren til programmet hjæl¬ 


pe. Han sælger program¬ 
met både til Commodore 
64 og til VIC-20 på en C-60 
kassette af god kvalitet. 
Prisen er 65 kroner incl. 
forsendelse. Send en 
check og din adresse til: 
Flemming Lerbæk 
Blåkildevej 11 
5750 Ringe 

Foruden MONITOR *64 
indeholder kassetten 
PRINT (a> maskinpro- 
grammet. 
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VIC programmer 


Lad andre få mulighed for at 
købe de programmer, du ud¬ 
vikler til VIC. 


Rubrikannoncer her i bladet 
koster 1 kr. pr. spaltemilli¬ 
meter, og for overskuelighe¬ 
dens skyld bør annoncerne 
bygges op på samme måde, 
som det kan ses her på siden. 


Det vil sige, at annoncetek¬ 
sten skal indeholde oplysnin¬ 
ger om nødvendigt udstyr, 
hvilket medium, progammet 
findes på (kassettebånd, disk 
eller cartridge), prisen - og 
naturligvis oplysninger om, 
hvor man kan købe program¬ 
met. 

Brug kuponen til din annon¬ 
ce. 


VIC program sælges 

Programmets navn:_ 

Beskrivelse: _______ 


Hardware:_Medium: 

Pris: _ 

Købes hos: _ 


Kuponen sendes til VI & VIC, Kornager29, 7100 Vejle. 


ONDSKABENS 

LABYRINT 

Du er havnet i en stor mørk 
labyrint, fyldt til renden med 
flagermus, slanger og en 
masse andre ulækre ting. 
Hardware: VIC-20 (3585). 
Medium: Kassettebånd. 

Pris: 75 kr. (check'med bestil¬ 
lingen). 

Købes hos: Kim Konrad Jen¬ 
sen, Ærtebjergvej 4, Tå- 
stråp, 8410 Rønde. 


VIC-kontakten 

Navn:_ 

Adresse:_ 


Postnr.:_ 

BY:_ 

Tlf.: _ 

Bemærkninger: 


Kuponen sendes til VI & 
VIC, Kornager 29, 7100 
Vejle. 


VIC-kontakten 


Stephen Laursen 
Dalsø Park 118, 3500 Værlø¬ 
se. Tlf. 02-48 46 18 
Bemærkninger: Også andre 
Commodore-maskiner har 
interesse. 

□ 

Niels Stål Pedersen 
Struervej 103, 7500 Holste¬ 
bro. Tlf. (07)41 06 18. 
Bemærkninger: Start af lokal 
VIC-klub. 

□ 

Michael Bødstrup Hansen 
Duevej 16, 5tv., 2000 Køben¬ 
havn F. 

Bemærkninger: Har 32K 
VIC, 40/80 kort, diskettesta¬ 
tion, FORTH. Specielt inter¬ 
esseret i FORTH program¬ 
mering. Udveksler gerne 
printerudskrifter af FORTH 
programmer. 

□ 

Carsten Svendsen 
Kastanie Allé 2, 

8570 Trusstrup. 

□ 

Finn Christensen 
Hjermvej 31,7600 Struer. 
Tlf. (07) 85 35 09. 

□ 


Lad VI & VIC 
hjælpe dig 

VI & VIC skal være med til at du kan få mere 
fornøjelse af din VIC-20, og derfor indbyder 
vi dig til at komme med dine praktiske eller 
mere teoretiske spørgsmål. 

Pladsen vil naturligvis sætte grænserne for, 
hvor mange spørgsmål, der kan blive besvaret 
her i bladet, men vi vil naturligvis først og 
fremmest lægge vægt på at besvare de 
spørgsmål, som optager mange VIC-brugere. 
Skriv til VI & VIC på adressen Kornager 29, 
7100 Vejle, hvis du har spørgsmål, du gerne 
vil have behandlet. 
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O VIC-20 computer 

Det private computersystem starter med ViC-20 - hjemmecompute¬ 
ren fra C'ommodore. Verdens første fuldt udbyggede farvecomputer 

tii kr. 2.995,- 

VIC-20 kan udbygges til et enkelt eller mere avanceret system efter 
ønske og i takt med brugerens behov. Til privat brug. Til undervis¬ 
ning. Til forretningsbrug. 

VIC-20 har skrivemaskinetastatur. 8 funktionstaster. 255 farvekom¬ 
binationer. 64 grafiske tegn. Musikgenerator. Intern hukommelse 
op til 32K RAM. Tilsluttes alle TV-apparater og monitorer. 

O VIC-1530 kassettestalion 

Det første skridt mange tager, når de udbygger deres VlC-compu- 
tersystem. Kassetrestationen kan bruges til datalager eller til over¬ 
førsel af programmer. Pris: kr. 1.035,-. 

O V IC-1540 diskettestation 

Diskettestationen giver mulighed for det fulde udbytte af VlC-com- 
putersystemet. Lagerkapaciteten udvides til 170K bytes. Op til 4 di¬ 
skettestationer kan kobles til samtidigt. Velegnet til programudvi¬ 
kling. Hurtig dataoverførsel. Pris: kr. 6.495,-. 

O VIC-1515 printer 

Rigtig papirprinter. 80 karakterer og en hastighed på 30 tegn/sek. 

Pris: kr. 4.945,-. 

O VIC-1020 moder-modul 

Dette modul er bl.a. nødvendigt for at udnytte VIC fuldt ud. Gør 
det muligt samtidig at tilslutte f.eks. 3 - 8 og 16K RAM, superexpan- 
der, etc. Pris: kr. 2.280,-. 


O Udvidelse af hukommelse 

VIC-20’s hukommelseskapacitet kan udvides med 3K til 27K RAM. 

O V1CMON 

Gør det muligt at programmere i maskinsprog. Pris: kr. 400,-. 

O V1C-1211A Superexpander 

Giver højopløst grafik og ekstra kommandoer til plotning, farve¬ 
lægning, etc. Pris: kr. 595,-. 

O VIC-1212 Programmers aid pack 

Et godt hjælpeværktøj ved programmering. Giver 14 ekstra kom¬ 
mandoer. Pris: kr. 495,-. 

© V1C-1311 joy stick 

Til spil og lignende. Pris: kr. 95,-. 

© Brugerhåndbog 

Der findes let forståelig dansk brugerhåndbog til VIC, som også på 
enkel og klar måde fortæller om BASIC. Hveranden måned udkom¬ 
mer brugerbladet VI & VIC, som kan købes i løssalg eller abonne¬ 
ment med VIC-nyheder. 

Find nærmeste autoriserede VIC-forhandler på listen og kom ind og 
prøv VIC hjemmecomputeren. 

Alle priser er incl. moms. 

Cs. commodore 

v COMPUTER 

05 - 64 11 55 eller 0 1 - 88 15 05 


ØERNE: Ballerup: Mie Kasseapparater, 02-655111 Bornholm: Krogh Hansens Radio & TV, 03-998127. Herlev: W Rolf Pedersen, 02-915511. Hillerød: Bo-el Data, 02-253131. Holbæk: 
Papirgården. 03-433003. København: BN Elektronic, 01-811900 og 01-184555. C'R-Commander Radio. 01-343422. L. A. Elektronik Kbh., 01-551540. Betafon Radio, 01-310273. Sam¬ 
fundslitteratur. 01-351942. Polv Data Microcenter, 01-420705. W. Rolf Pedersen. 01-137056. Lyngby: BN Elektronik. 02-881900. Polyteknisk Boghandel. 02-881488. Maribo: JDTotalin- 
formation, 03-881700. Odense: Dansk Totalinformation. 09-126488. EDB Butikken, 09-147660. Fl. Kjerulff. 09-135480. Otterup: Werners Radio Elektronik, 09-823333. Ringsted: Ahrent 
Flensborg. 03-610011 Rødovre: Datacare, 01-705858 Slagelse: Vest Sjællands Mikrodata. 03-534707. St. Heddinge: JE Kontorcenter. 03-703332. Svendborg: Jens Bach Kontordata. 
09 212788. Vibv Sj.: Baagøe Radio. 02-394100. Vordingborg: Kontorforsyningen. 03-770170. GRØNLAND: Godthåb: Godthåb Elektronikservice, 21865. Julianehåb: Musikhuset Julia- 
nehåb. 01-4381*33. JYLLAND: Aalborg: Knud Engsig Kontorudstyr. 08-126666. H. C. Elektronic. 08-142314. Esbjerg: Kurt Øland. 05-125299. Fredericia: Semicap Data. 05-931565. 
Gram: Teknik' Huset. 04-822711. Grenå: Djursland Data. 06-326465. Haderslev: H. C. Reimers. 04-523714. Hadsten: Hadsten Elektronik. 06-980408. Herning: Logic Design. 07-221300. 
Hjørring: Norad. 08-960188 Holstebro: Pe-Co Computer System, 07-414646. Horsens: Dansk Computer Center. 05-611110 Kolding: Hauge Rasmussen Foto. 05-520070. Randers: Djurs¬ 
land Data. 06-434200 Ringkøbing: LP Musik. 07-322511. Skanderborg: Bildata. 06-525344. Skive: Elektroniklageret. 07-526177. Struer: Helmholt Elektronik. 07-852611. Sønderborg: G. 
P Kontorsystemer. 04-424546. Vejle: 2R Data. 05-831600. Århus: Akademisk Boghandel, 06-128844. demens Papirteknik. 06-133922. Editor. 06-127720. 


Hedelund Marketing, Vejle 





















